home *** CD-ROM | disk | FTP | other *** search
/ Pascal Super Library / Pascal Super Library (CW International)(1997).bin / LIBRARY / PAS_0693 / HIDECURS.PAS < prev    next >
Pascal/Delphi Source File  |  1993-06-30  |  689b  |  27 lines
  1. {─ Fido Pascal Conference ────────────────────────────────────────────── PASCAL ─
  2. Msg  : 606 of 614
  3. From : Bill Buchanan                       1:2410/318.0         16 Jun 93  10:17
  4. To   : Terry Bennett
  5. Subj : TP7.0
  6. ────────────────────────────────────────────────────────────────────────────────
  7.  -=> Quoting Terry Bennett to all <=-
  8.  
  9.  TB> Heh There
  10.  TB> Can anyone tell me how to hide the cursor while using a readln
  11.  TB> command in TP7.0?
  12.  
  13. Here's about the quickest way I know of...}
  14.  
  15. procedure HideCursor; Assembler;
  16. asm
  17.   MOV   ax,$0100
  18.   MOV   cx,$2607
  19.   INT   $10
  20. end;
  21.  
  22. procedure ShowCursor; Assembler;
  23. asm
  24.   MOV   ax,$0100
  25.   MOV   cx,$0506
  26.   INT   $10
  27. end;